TEXTLOAD "@.bas.ExplodeDir"
SAVE "@.ExplodeDir"
QUIT
